home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ IE URLs 2.xpl < prev    next >
Text File  |  2004-03-01  |  3KB  |  77 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="3"
  3. "COUNT"="3"
  4. "UIPATH 1"="Internet\Internet Explorer\URL Handling"
  5. "UIPATH 2"="Virtual Paranoia\Program Hijacking"
  6. "NAME"="Internet Explorer Home page URLs"
  7. "LANGUAGE"="VBScript"
  8. "VERSION"="1.17"
  9. "TEXT 1"="Home page"
  10. "TEXT 2"="First Home page"
  11. "TEXT 3"="Default Home page"
  12. "DATA 1"="Web documents|*.html;*.htm;*.php;*.php3;*.cgi;*.pl;*.asp;*.jsp;*.mht|All Files (*.*)|*.*"
  13. "DATA 2"="Web documents|*.html;*.htm;*.php;*.php3;*.cgi;*.pl;*.asp;*.jsp;*.mht|All Files (*.*)|*.*"
  14. "DATA 3"="Web documents|*.html;*.htm;*.php;*.php3;*.cgi;*.pl;*.asp;*.jsp;*.mht|All Files (*.*)|*.*"
  15. "DESCRIPTION 1"="Although it sounds strange, Internet Explorer (IE) has three different home page URLs."
  16. "DESCRIPTION 2"=""Home page" refers to what has been configured as home page inside your Internet Options. This is the currently configured page that is loaded as soon as IE starts. If you wish to have IE started with an empty URL, enter "about:blank" (without the quotes)."
  17. "DESCRIPTION 3"=""First Home page" refers to an URL that is shown only once and it will be deleted as soon as it has been shown once. Mostly this is used for first-time information. If an URL is configured here, it will be shown next time IE is launched. If there is no URL configured (field is empty), the normal Home page will be shown."
  18. "DESCRIPTION 4"=""Default Home page" refers to the URL that will be used when you click the button "Use Default" in Internet Options -> Home Page. This URL is thought for users that have changed their homepage and want to have the default homepage back again."
  19. "DESCRIPTION 5"="Note: All these URLs can either be remote URLs (http://www.x-setup.net) or local files."
  20. "AUTHOR"="Xteq Systems"
  21. "CONTACTURL"="http://www.xteq.com"
  22. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  23. "COMMENT 1"=" "
  24. "COMMENT 2"=" "
  25.  
  26. sPCheck="HKCU\Software\Microsoft\Internet Explorer"
  27.  
  28. sV1="HKCU\Software\Microsoft\Internet Explorer\Main\Start Page"
  29. sV2="HKCU\Software\Microsoft\Internet Explorer\Main\First Home Page"
  30. sV3="HKCU\Software\Microsoft\Internet Explorer\Main\Default_Page_URL"
  31.  
  32. 'http://www.webmedic.com"
  33. 'http://home.microsoft.com/runonce.asp
  34.  
  35.  
  36. Sub Plugin_Initialize 
  37.  if RegPathExists(sPCheck) then
  38.     s=RegReadValue(sV1)
  39.     Call SetUIElement(1,s)
  40.  
  41.     s=RegReadValue(sV2)
  42.     Call SetUIElement(2,s)
  43.  
  44.     s=RegReadValue(sV3)
  45.     Call SetUIElement(3,s)
  46.  else
  47.     Call Disable()
  48.  end if
  49. End Sub
  50.  
  51. Sub Plugin_CheckData(ElementIndex)
  52. End Sub
  53.  
  54. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  55.  Call DoWork(1,sV1,false)
  56.  Call DoWork(2,sV2,true)
  57.  Call DoWork(3,sV3,false)
  58.  Call Logoff()
  59. End Sub
  60.  
  61. Sub DoWork(NUM,REG,DO_DEL)
  62.  s=GetUIElement(NUM)
  63.  Call RegWriteValue(REG,s,1)
  64.  
  65.  if DO_DEL=TRUE THEN
  66.     if RegValueExists(REG)=true then
  67.        Call RegDeleteValue(REG)
  68.     end if
  69.  end if
  70. End Sub
  71.  
  72. Sub Plugin_Terminate 
  73. End Sub
  74.  
  75.  
  76.  
  77.